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4051 . 4631 and Zonic DMS 5003 teamwork results in easy-to-read graphs of analog data. 



Tektronix-Zonic Fast Fourier Transform (FFT), Data 
Acquisition and Analysis System 

by L D. Mitchell 

Virginia Polytechnic Institute and State University 

Virginia Polytechnic Institute and State University has 
assembled a very powerful data acquisition and analysis 
system, using the TEKTRONIX 4051 Graphic System as 
a key component. Working with Tektronix and Zonic 
Technical Laboratories, the two-function system shown 
above was configured. This system’s first function is easy 
acquisition of real-world analog data and conversion of 
that data into digital information understood by either 
microprocessors or large scale computers. The system 
also locally processes and analyzes time domain data. The 
4051 Graphic System and the Zonic Technical 
Laboratories High Speed Tw'o Channel FFT share this 
second function. 



The Zonic unit performs any one of thirty-three frequen- 
cy domain type functions. Statistical data is handled 



expeditiously, because the forward Fourier transforms 
are computed in 50 milliseconds. Once the Zonic unit 
completes the requested frequency domain operation, the 
405 1 display plots the graphic result, in the form of a log- 
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log, log-linear, or linear-linear graph, labeled in engineer- 
ing units. Typical of such results might be a graph of the 
frequency response of a physical system, in both 
magnitude and phase. Any graphic display can be copied 
using the TEKTRONIX 4631 Hard Copy Unit included 
in the system. 

Besides displaying graphic results, the 405 1 is also used to 
handle analyses beyond the Zonic unit’s capability. This 
can include data analysis that is outside the domain of the 
preprogrammed Zonic functions, and/or data analysis 
needs that go beyond the batch programming capability 
of the Zonic unit. For these cases, the system transfers 
eit her the data or a pre-analyzed frequency domain result 
to the 405 1’s cartridge tape unit. The data can then be 
analyzed in any way desired, using the programmable 
capability of the TEKTRONIX 4051 Graphic System. 

As an e.xample, consider amplitude time history data. 
This data cannot be analyzed for its amplitude probabili- 
ty density function by the Zonic High Speed FFT system. 



However, the data can be transferred to the 4051 Graphic t 
System. This allows existing Plot 50 software, such as that 
in Statistics Volume 1, to carry out that analysis. ^ 

Moreover, the 4051 can be programmed to operate on the 
data in any way desired. If the particular analysis requires 
a lot of number crunching, the raw data and/or the pre- 
analyzed results may be transmitted out through the 
Option 1 RS-232 Interface to a large-scale computer. 
Virginia Polytechnic Institute and State University uses 
an IBM 370 configured with two model 158s. One 
machine is in batch operation with five megabytes of core; 
the other machine is interactive and has four megabytes of 
core. 

This configuration of two interlinked microprocessor- 
based systems, which are in turn linked to a large-scale 
computer, yields great flexibility in data analysis. This 
system also capitalizes on the inherent graphics capability 
of the 4051 Graphic System for the presentation of 
analysis results, o 



Binary Liquid- Vapor Boiling 
Point Diagrams 

An interactive graphic program is now available, written 
in 4051 BASIC, that produces diagrams of liquid-vapor 
boiling points. The program computes and plots the 
liquid and vapor composition curves as a function of 
temperature for any volatile two-component system. Dr. 
Gilbert F. Pollnow of the University of Wisconsin- 
Oshkosh developed the program with the support of both 
a unique faculty development funding program and a 
National Science Foundation grant. The NSF funding 
enabled the purchase of three TEKTRONIX 4051 
Graphic Systems with 32K memory, along with a Hard 
Copy Unit. This was all part of an interdisciplinary grant 
involving Chemistry, Physics, Geology and Geography. 

The Binary Liquid-Vapor Boiling Point Diagrams 
program plots both the ideal and Van Laar represen- 
tations for the liquid system. On the same plot is the 
experimental boiling point composition data: a sample 
plot is shown in Fig. 2. The points are plotted as they are 
generated, emphasizing the discrete and conjugate nature 
of the experimental and theoretical data. The program 
computes the Van Laar constants using the method 
described in F. Daniels’ Experimental Physical 
Chemistry, which requires the composition and boiling 
point of the azeotrope, barometric pressure, and the 
Antoine vapor pressure constants for both pure com- 
ponents. Tabular output of the liquid and vapor com- 
positions (Fig. 3) is optional. As a tutorial, the program is 
set up to graph literature data for the acetonitile-water 
system if it is executed without modifying the parameters. 

Copyright « 1978, Tektronix. Inc, 

All rights reserved 




4051 graphics relieve tedium and enhance understanding of 
complex chemistry problems in Or. Gilbert F. Pollnow's class 
at the University of Wisconsin. 



At UWO physical chemistry students are required to 
calculate the Van Laar constants and the conjugate 
compositions corresponding to one of the tabular output 
points on their personal calculators for a known system. 
This reinforces their understanding of the computations 
prior to performing the laboratory experiment as describ- 
ed in the Daniels text. In addition, the Van Laar constants 
are also determined by the students using the least squares 
method, and attempts are made to rationalize the 
differences. This experiment also provides an excellent 
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PCETOMITRILE-HATER LIOUID-UAPOR EQUILIBRIA 
FIGURE 2 
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0. 3471 
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0.4905 
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0.5995 




0.3258 


76.37 


0.5005 
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0.3132 


76. 15 
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0. 3009 


76.01 
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0.2995 
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0. 1693 


THE UAPOR PRESSURE 


CONSTANTS USED 


TO COMPUTE 


THE A80UE 


RESULTS ARE: 


A1 • 7.11988 81 


• -1314.40 


Cl » 230.00 








A2 » 7.96681 82 


» -1668.21 


C2 » 228.00 
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760.0 










HOLE FRACTION (ONE) 


IN AZEOTROPE 


■ 0.7269 








BOILING POINT OF THE AZEOTROPE U 


1 DEG C - 7 


6.00 






UAH LAAR CONSTANTS 


A1 AND A2 ARE 


0.7669 


0.7357 





opportunity to demonstrate the use of a software 
polynomial regression program for plotting and fitting 
their refractive index composition data and then using the 
resulting polynomial to compute the conjugate com- 
positions from their measured refractive indices. 

Dr. Pollnow has been involved with computer science and 
its practical applications on the university scene since 
1962. Enabled by university funding and the \SF grant, 
his recent endeavors focus upon improving and in- 
creasing computer use to solve ordinary chemical 
problems which would otherwise be too tedious or 
complex to include in the undergraduate program. 



From the original 1963-64 room-sized IBM machine to 
the new desk-top 405 1 Graphic systems, a gigantic leap in 
the capacity of the machine, as well as accessibility for the 
layman, has been achieved. The graphic ability of the 
405 1 display screen has made possible a host of solutions 
hitherto unavailable to most computer users. Using this 
advantage. Dr. Pollnow has created a number of 
autotutorial program modules for his students in physical 
chemistry classes. The popularity of such applications is 
evidenced by requests from scholars from both sides of 
the world for copies of his programs. Copies of this 
program with sample output are available from Dr. 
Pollnow upon request, - 



EDITOR’S NOTE 

New Catalog 

You will notice a new catalog of 4051 Applications 
Library programs enclosed with this issue of TEKniques. 
This catalog contains several new program categories and 
lots of new programs. Look through it. Additional copies 
are available for the asking. The 4051 Applications 
Library staff thanks all of you who contributed to the 
Library and made these additional programs available. 

Contest Finale 

By the time you read this, all of the entries in the 
Computer-Aided Design contest have been received and 
judged. Contest results will appear in the July issue of 
TEKniques; watch for the winning programs! 

51/00-8004/0 Documentation 
Contains "Typo" 

In the Cross Reference and List Program Variables 
program there are typographical errors on page 4 of the 
documentation. Under Operating Hints, all references to 
''FS'' should be changed to ''F5'', and "'JS'' to ''J5U 



Hopefully this has not caused anyone anguish who 
purchased this program. Our thanks to John Williams of 
GTE Automatic Electric for pointing this out. 

Dashed Lines Combined 

Three subroutines for different methods of drawing 
dashed lines have been combined in a new Applications 
Library program entry. Check out Abstract No. 
51/00-9508/ 1 in this issue. 



Membership Card Enclosed 

It’s free. Other than sunshine and air, not too many things 
are. But membership in the 4051 Applications Library is 
free for 4051 owners and users. Pass the enclosed 
membership cards along to those who borrow your 
TEKniques. They’ll get their own copy of these bits of 
wisdom and your newsletter remains intact. Plus, more 
members mean more ideas — we’ll all benefit. If you need 
more cards, call Rory Gugliotta at (503) 682-341 1, ext. 
2618. Sign up those friends of the ‘51. 
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Using Graphics Technology in Calculus 



by Edwin T. Hoefer 

Rochester Institute of Technology 

in many areas of science, a graphics demonstration in the 
classroom can clarify the instructor’s complex point. The 
Rochester Institute of Technology uses the 4051 Graphic 
System to provide graphic classroom illustration of 
fundamental functions in calculus. For instance, the 4051 
can draw on the screen the interesting curves that are 
analyzed in a traditional calculus class. A particular 
technique of plotting the graphic display is used to 
dramatically illustrate the concept of "rate of change" of a 
function. 

The 4051 draws curves by small line segments, usually 
controlled by a FOR-NEXT, so that the x-axis in- 
crements are of constant size. This causes dx; dt to remain 
constant. Thus, the rate of change in the y-axis increments 




Overlays Expand Capability 

by Jay Beck 

How do you run a program larger than the memory 
capacity of your machine? Try’ the overlay technique 
using the 405 1 memory management capability combined 
with the 4907 FILE MANAGER. 

Create overlays by developing a program as a set of tasks 
to be performed. Write each task as if it were to be the 
only one in the machine. The tasks will be loaded (and 
later deleted) under the control of a small program that 
always remains in memory. Each task is called an 
"overlay" because it occupies the same memory as the 
preceding task. 

To see how the overlay technique is used, let’s analyze an 
overlaid program comprised of three tasks. (In our 
example, the function of each task will be the same.) 

Three things must be considered in a numbering strategy. 
1) The line numbers must remain the same in key sections 
of the small program that loads the overlay. 2) Each 
overlay must begin with the same line number. 3) Each 
overlay's line numbers must lie within a known range. 



( 

of the curve, dy/dt = dy/dx. The ratio dx/dt is directly 
proportional to dy/dx, so the rate at which the curve is 
actually drawn on the display is a visual demonstration of 
the rate of change in dy/dt. 

Consider the familiar examples of y = x^ and y = x^ As 
these curves were drawn on the display, the class observed 
that it takes longer to draw the points close to (0,0) than to 
draw the rest of the curve. This corresponds to the fact 
that dy / dt = 0 at the point (0,0). They also clearly saw that 
the larger the value of dy/ dt, the faster the curve is drawn. 

Thus, the 405 1 display graphically illustrated the calculus 
concept of "rate of change" for the class, through 
calculating and drawing the curves. 



lOOOO GO ’’0 30090 



■.■/OOOO REM — AREA 

20010 REM 

30000 »£M 

30010 REM , A I N P R 0 G .R A M 

30020 ■■ main 

30030 REM ^ . 

30040 REM 

30050 REM OVI Area 

30060 GQSUB 30220 
30070 GC TO 20060 

30080 MAIN PROGRAM 



30090 INIT 
30100 * 

30110 U=2 
30120. REM 
30130 REM 
30140 REM 

30150 REM T>jPical 

30160 P*«*8PR0GRAM/0ULDI • 
,30170 GO TO 30060 
30180 REM ; 

30190 REM : 

30200 REM 

30210 REM 

30220 IF F»«=A* THEN 30230 
30230 DELETE 20020.29990 
•30240 Q»MEM0R'T 
,30250 call ’UNIT' .U 
30260 APPEND F»!200l0.10 
30270 A*»F$ 

,50290 RETURN 



Fig, 1. Numoering system for the main program. 

The small controlling program (Fig. 1) is written so it can 
be renumbered starting at line 30080 (e.g., REN 30080,- 
10,30080). The sections of this program that are not to be 
disturbed are placed at the beginning. Thus, the mam 
prosram can be developed and renumbered as new 
common routines are added. 

For our example, the overlays have line numbers from 
20010 to 29990. This allows 998 lines of 405 1 BASIC to be 
written per overlay, using a line number increment ot 10. 

As mentioned, the overlays are identical except for the 
title banner and the first line of the message displayed. 
Note that each overlay begins with a REMARK state- 
ment. This statement has the same line number as y" 
REMARK statement in the small controlling maiil. 
program. Thus, each time the DELETE is done, a 
properly numbered line remains behind to serve as a 
target line in the next APPEND operation. 
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JOOlO REM 
.’0020 RCM 

20030 REM I SAMPLE RROORAM 

20040 REM I OOLOl 

20050 REM : 

20060 PAGE 

20070 PRINT 'Ov^rlav i Ent*r*M' 

..'0000 PRINT 

;.'0090 PRINT "CHOOSE NEXT OOERLAT" 

..'0100 PRINT • OVLOl 

JOUO PRINT • 0VL02 --2--' 

.J0120 PRINT * 0OL03 --3--* 

.,’0130 PRINT ' END --4--" 

:.'0140 PRINT "ENTER OOERLAT CHOICE : "» 
20150 INPUT 0 

J0160 IF 0< 1 OR 0-4 THEN 20140 
..'0170 IF 0 = 4 THEN 20240 
JOiaO 0t»STR(0) 

20190 0»-SEG(0».2. 10) 

J0200 REM Reouestt Trsnif.r 

20210 F»« "9PR0GRAM70UL0" 10* 

.:0220 GO TO 30060 

20230 REM 

20240 END 

,.’0010 REM 

.’0020 REM ; 

20030 REM : SAMPLE PROGRAM 

20040 REM ; 0UL02 

20050 REM : 

20060 PAGE 

.20070 PRINT "OverLa'rf 2 Entert'l" 

20080 PRINT 

.:0090 PRINT "CHOOSE NEXT OVERLAY" 

.;0100 PRINT ■ OULOl 
JOllO PRINT ■ 0UL02 — 2--" 

JO 1 20 PRINT • 0UL0 3 
J0130 PRINT " END 

JO 140 PRINT "ENTER OUERLAY CHOICE : "J 

20150 INPUT 0 

J0160 IF 0-1 OR 0>4 THEN 20140 
.:0170 IF 0 = 4 then 20240 
20180 0*»STR(0) 

20190 0t=SEGi0».2. 10) 

..'0200 REM R eaues L »■ T r a"'S f # 1 

20210 F*= * 9PP0GRAM/0UL0 " 104 
J0220 GO TO 30060 

20230 REM 

20240 END 

.10010 REM 

.:0020 PEM : 

20030 REM sample PROGRAM 

20040 REM : 0UL03 

20050 REM : 

20060 =AGE 

200 70 PRINT "Qverls'a 3 Erit,e'"e'j‘ 

J0080 PRINT 

..’0090 PRINT "ChOOSt NEXT GVE.= LAt" 

JOlOO PRINT " 2OL01 

JOllO PRINT • GUL02 --2--" 

J0120 PRINT " QUL03 --3--" 

J0130 PRINT ■ END --4--* 

J0140 PRINT "ENTER OUERLAY CHOICE : "J 

20150 INPUT 0 

. 0160 IF 0' 1 OR 0->4 THEN 20140 
J0170 IF 0=4 then 20240 
J0180 04=STR(0) 

20190 a 4 =SEG< 04 , 2 . 10) 

J0200 REM Reauestt T ransf er 

20210 P4="0PROGRAM/OVLO" t04 
J0220 GG TO 30060 

20230 REM 

20240 END 



Fig. 2. Overlay numbering system. 



Line numbers 30210 to 30280 actually load the overlay, 
but only if it is not already resident in memory. 
Q-MEMORY is included to compress memory before 
the APPEND statement is executed. 



The GOTO in line 10000 transfers control to the initial 
statement in the overlay controller program at line 30090. 
bypassing the sensitively numbered section. Organizing 
the program in this manner also ensures that an overlaid 
program, terminated with an END or STOP statement, 
can be RUN again without reloading anv part of it from 
the 4907. 



Figure 3 portrays the file structure created for the sample 
program. Using the desired overlay number (lines 20140- 
20190), the program dynamically builds a file name (line 
20210) which the system then requests for loading. 



When large programs are implemented as overlays, the 
4907 can be used to provide direct access and fast loading 
of program segments. Using such techniques allows 
powerful application programming systems to be built. 




Fig. 3. 4907 file structure created for the sample program. 



Save Overlay On Correct File 

by Jay Beck 

In developing a large program using overlays, you will be 
doing repeated OLDs and SA VEs. In the first few lines of 
each overlay include as part of the REMARK statement 
the name of the file in which that overlay is to be stored. 
Then, take time to list these lines and check the name of 
the file to avoid mistakenly storing an overlay on the 
wrong file. 



4051 Subroutine Linkage 

The GOSUB kev'word is a very powerful and useful 
feature in BASIC. However, this feature can occasionally 
lead to undesirable results if its use is not fully un- 
derstood. 

Each time a GOSUB statement is executed, six more 
bvtes of Random Access Memory is allocated to a push- 
down stack for the storage of return address pointers. In 
turn, each time a RETURN statement is executed, the 
stack is popped; allocated memory is then returned to the 
system. The stored return address is used to continue 
execution at the statement following the GOSUB. 

This procedure works very well until a program branches 
out of a subroutine, using a GO TO or an IF-THEN 
statement. If these branches out of the subroutine do not 
re-enter the subroutine or execute a RETURN statement, 
then the stack is not popped. Many iterations of this 
process of pushing the stack (with a GOSUB) and 
neglecting to pop the stack (with a RETURN) results in a 
gradual loss of memory and, eventually, a MEMORY 
FULL condition. 



Variable Names Take Same Bytes 

In a recent issue of TEKniques, it was suggested that using 
single character variables instead of two-character would 
save memory. While this holds true for many machines, it 
does not for the 405 1. The 405 1 is designed so that no 
additional space is required for a two-character name. 



5 





Tracking Variables 



Up to your ears with paper and code? Can’t find those 
chunks with your variable names? Get organized. Try one 
of the variable tables sent in by TEKniques readers. 



The first type of table is a form contributed by Bob Y oung 
of Tektronix. A handy program draws it on the 4662 
Plotter. Shown below is a working example. 




lea 

110 

128 

130 

140 

150 

160 

170 

188 

190 

280 

218 

220 

239 

240 
258 
260 

279 

280 
290 
300 
310 
320 
330 
340 
350 
360 
370 

389 

390 

409 

410 
420 
439 



IHIT 

D-1 

PRINT 01,17:2,2 
PRINT 0D,2i:i0.9,99 

PRINT fO:'405l BASIC UARIABLE TABLE" 

PRINT 00,21:13.8,93.5 
PRINT 00; "PROGRAM; " 

PRINT 00,21:13.67,93.3 

PRINT 00,29: 13.67,5.75, 125.2,5.75, 125. 2, 93. 3, 9. 6. 93. 3. 9. 6, 5. 75 
PRINT 00,20:13.67,5.75 
PRINT 00,21:11.5,2.7 
PRINT 00: "REMARK; "} 

PRINT 00,21:26.9,5.75 

FOR 1-26.9 TO 127 STEP 17.872 

PRINT 00,21:1,5.75 

PRINT 00,20; 1,93.3, 1+8.936,93.3, 1+8.936,5.75 
NEXT I 

FOR 1-8.6 TO 88 STEP 6.596 
PRINT 00.21: 125.2, I 

PRINT 00,20:9.6, 1,9.6, 1+3.298, 125.2, 1 + 3.298 
NEXT I 

DATA "9", "8", "7", -6", -5", "4", "3", "2", -1", "0", "b", -f" 

FOR 1-120 TO 14 STEP -8.936 
READ At 

PRINT 00,21:1,91 
PRINT 00: At 
NEXT I 

DATA "A","B","C", "0", "E", "F", •C","H", -1", "J", -K", 

OATA "N","0", "P", "Q", "P", "S", "T", -U“,"U", “U", -X", "Y", -2" 

FOR 1-88.4 TO 5 STEP -3.298 
READ At 

PRINT 00,21:11.32,1 
PRINT 0O:At 
NEXT I 



The second type is in the form of a BASIC program. Ed 
Mitchell of Tektronix wrote the program that prints 
variable tables on the screen or to a line printer. Ed’s 
program provides for String Variables, Simple Variables, 
and Function Variables. Examples and the program 
listing follow. 





STRINGS 




A« 




LENGTH< ) 


6* 




_ LEHGTHC ) 


C* 




___ LENGTH< ) 


0»-_- ’ _ 




LEHGTH( ) 


E* 




LENGTHt ) 


F*. 




_ L£NGTH( > 


G* 




LENCTHC ) 


H# 




. _ _ LEHGTHC 


I* 




LENGTN< > 


Jt ... 




LENCTH< ) 


«• 




LFMCTHf j 


1 



A 




SIMPLE 




A0 


A1 


_ __ A2 


A3. 


A4 


A5 


A6 


A7__ _ 


A0 

B 


A9 






B0„ 


_ . B1 


B2 


B3 


84 


B5 


B6 


87 


B8 


B9 






C 

C0 


Cl 


C2 


C3 


C4 


C5 


C6 


C7 


C8 


- C9 









FUNCTIONS 




FHA(_) 


FNB< > 


FMC< ) 


FHD( ) 


FNE< ) 


FHF< ) 


FHGC ) 


FNN< ) 


FNK > 


FHJ<_) 


FMX( ) 


FHL< > 


FHM< ) 


FNH< ) 


FHO< ) 


FHP( ) 


FNQ( ) 


FHR< > 


FNS< ) 


FHTC ) 


FNU< ) 


FNU<_) 


-- FHHC ) 


FNX( > 


1 



1 F-0 

2 SET l<EY 

3 GO TO 180 

4 RE!1 U'^D 1 LIST STRINGS txttxttxxtxtttxtxttttxxxxtt 

5 F-1 

€ PRINT #32.26:3 

7 GO TO 240 

8 REM ttxttXttttXXtXXt U/0 2 LIST SIMPLE MARIABLES ttttttttttxtttttttt 

9 F«1 

10 PRINT #32.26:3 

1 1 GO TO 380 

12 REM Itttttttttttttt U'D 3 LIST FUNCTIONS ttttttttttttXtXtttttttttX 

13 F»l 

14 PRINT #32.26:3 

15 CO TO 760 

100 PNGE 

101 PRINT "ENTER DEUICE NUMBER FOR LINE PRINTER <40 OR 41), OR RETURN"; 

1 10 PRINT • FOR SCREEN. G* 

120 REMPRINT #32,26:3 

139 INPUT At 

140 IF THEN 190 

150 D»UAL(AI> 

160 IF 0-40 OR 0-41 THEN 200 
170 CO TO 100 
180 CO TO 200 
190 0-32 

290 PRINT "PRESS RETURN FOR COMPLETE LIST OR PRESS USER OEFIHftBLE 1. 2"1 
210 PRINT ‘ OR 3 FOR* 

220 PRINT "PARTIAL LISTS." 

230 INPUT At 

240 REM (.•mm start STRING LIST--< 

250 PRINT #D: *L* 

260 PRINT »0:* STRIHGSJJ" 

270 FOR N-65 TO 90 
20* B»-CHR(N> 

290 PRINT #o:Bii-«,,^ "1 

306 PRINT fOJ" LEN2Tfl< Tjj* 

310 NEXT N 

320 IF FOi THEM 360 

330 REM ?+t F-1 IS THE USER OEFlNAiLE FLAG 
340 F-0 

350 PRINT #32,26:0 
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369 

389 

390 

409 

419 

429 

439 

449 

439 

469 

479 

489 

490 
300 
310 
320 
330 
540 
550 
560 



610 

620 

639 

640 
630 

669 

670 



710 

720 

730 



830 

840 

850 

860 



EHO 

REH (mmmmmmmmmmmmmmmmmmmmnmmmm-m.mmm STfiPT SIMPLE U0PIOBLE -•< 
PBIHT 90: “L* 

PPIHT 90f 3IMPLEJ* 

FOR M-63 TO 99 
B*«CHR(H) 

PRINT to: J- 

REM PftlfiT SiHPLf UaSTABLES 4 AT A TIME <SU8 670) 

X«0 

Y-3 

GOSUB 670 

X-4 

Y-7 

GOSUB 670 

y .«8 

Y-9 

GOSUB 670 
REM 

REM GIN IS TO INSURE THAT COMPLETE UARIABLES ARE PRINTED 

REM BY FORCING A PAGE FULL IF THERE ISNT ENOUGH ROOM. 

GIN Q.M 

IF H>20 THEM 620 
IF 0032 THEN 620 
COPY 
PAGE 

GO TO 620 
NEXT N 

IF FOl THEN 760 
F-9 



PRINT 932.26:0 
END 

FOR Hl-X TO y 
C»-STR(N1 > 
C»-SEC>C$,2, 1 ^ 

PRINT ?D:B*lCfl’ 

NEXT HI 
PRINT 90:‘JJ* 

RETURN 
NEXT M 

PRINT 9D:*J* 

PRINT 90: *L* 

PRINT 90: * 

FOP N«63 TO 90 STEP 3 
FOR Hl«0 TO 2 
H2«N-t-Nl 

IF M2'90 then 870 
8«*CHR’-H2 / 

PRINT 90: *FH" I 8$ J ‘ f ) 
NEXT Ml 
PRINT 90: -JJ* 

NEXT N 

IF D-'. /32 THEN 890 
COPY 

PRINT 932.26:0 



FUNC'^IOHSJJ* 



CASE Condition and Parentheses, 
Brackets and Braces 

by Arnie Kaber 

When SET CASE (default) is in effect, the BASIC 
intepreter considers lower case letters equal to upper case 
letters in string comparisons. The following pairs of 
symbols are also considered equal. 

< >, c 3, < ) 

However, if SET NOCASE is specified, upper and lower 
case letters are not equal; and neither are these symbols. 
The following examples illustrate results in each case: 



LIS 

199 SET MOCASE 

110 IF •CA6C3’-*<A0C>" THEN 390 
129 PRINT 'THEY ARE HOT EQLWC* 
209 EMO 

309 PRINT 'THEY ARE EQUAL' 

RUN 

THEY ARE HOT EQUAL 



LIS 

100 SET CASE 

110 IF ’CA8C3*-‘fABC)' THEN 300 
120 PRINT 'THEY ARE HOT EQUA*.' 
290 EHO 

300 PRINT 'THEY ARE EQUAL* 



The third type of variable table is also a BASIC program 
contributed by Dr. P. C. Holman of the University of 
Wisconsin-Stevens Point. It is a quick and easy screen- 
only table to keep track of numeric variables or alpha 
strings. The table is reproduced here followed by the 
program listing 



r 










PROGRAMMING AID 










program 


HAME__ 








PROGRAMMER. __ 






_ DATE 


- ^ 












NUMERIC 










ALPHA 


A< 


A0( 


) Al( 


A2< 


A3( 


A4< 


) A5( 


A6< ) 


A7( 


A8< 


) A9< ) 


A»< ) 


8C 


B0C 


) Bl( 


B2( 


B3f 


B4( 


) B3< 


66 ( ) 


B7f 


B8< 


B9( ) 


1 


C( 


C0< 


) Cl( 


C2( 


C3C 


C4< 


) C5< 


C6< ) 


C7( 


CBf 


^ C9< ) 


C»( ) 


DC 


O0< 


) Dlf 


D2( 


D3( 


D4< 


) D5< 


06C ) 


D7< 


D8< 


09( ) 


0*f ) 


E< 


E0( 


) Elf 


E2< 


E3< 


E4< 


) E5< 


E6< ) 


E7< 


) E8( 


E9f ) 


E»f ) 


F( 


F0( 


) Flf 


F2f 


F3( 


F4( 


) F3< 


F6< ) 


F7( 


F8< 


F9< ) 


FJf ) 


G( 


G0( 


) GI< 


G2< 


G3< 


C4< 


) G5< 


G6( ) 


G7( 


G8< 


G9< ) 


G»< •' 




H0< 


) NIC 


H2( 


H3< 


H4< 


) H3( 


H6C ) 


H7( 


HS( 


H9< ) 


HSf ) 


If 


I0< 


) IK 


I2( 


I3< 


I4< 


) I3( 


I6< ) 


I7( 


I8< 


I9< ) 


I*( ) 




J0f 


) Jl< 


) J2( 


) J3( 


J4< 


> J3f 


J6< ) 


J7( 


) J9f 


) J9< ) 


J*f > 


K ( 


K0f 


) KK 


) K2< 


) K3f 


K4< 


) K3C 


K6( ) 


K7< 


) K8< 


) K9f ) 


K$f » 


L( 


L0( 


) Ll< 


) L2< 


) L3f 


L4< 


) L3f 


L6C ) 


L7( 


) L8< 


) L9( ) 


L » 


M( 


M0( 


) Ml ( 


) M2< , 


) M3f 


M4< 


) M5< 


M6< ) 


M7< 


) M8< 


) M9< ) 


M»f ) 


H< 


N0( 


) Hl( 


) N2< 


> H3( 


H4< 


) N5< 


N6< ) 


N7f 


) H8< 


) N9( ) 


N*k ) 


Of 


O0( 


) OK 


^ 02< 


) 03f 


04< 


) 03f 


06< ) 


07< 


> 08( 


) 09< ) 


0«f ) 


P( 


P0( 


) PK 


) P2< 


) P3< 


P4( 


) P3( 


P6( ) 


P7< 


) P8( 


) P9< ) 


P«( ) 


Q( 


) Q0< 


) QK 


> Q2f 


> Q3< 


04 C 


) 05< 


Q6( ) 


Q7< 


> Q8( 


) 09( ) 


Qf ( ) 


R( 


) R0< 


) RK 


) R2< 


) R3< 


R4< 


) R3< 


R6< ) 


R7< 


) R8< 


) R9< ) 


R*. 


Sf 


) S0f 


) Slf 


) S2< 


) S3f 


S4( 


) S5( 


S6( ) 


S7( 


> S8( . 


) S9( ) 


Sf f ) 


T f 


> T0< 


) Tl.< 


) T2< 


) T3( 


> T4< 


) T3< 


T6< ) 


,T7< 


) T8< 


> T9( > 


Tf f •- 


Uf 


) U0< 


) UK 


) U2f 


) U3< 


) U4< 


) U5< ) 


U6< ) 


U7< 


> U0( 


> U9( ) 


Uff > 


U< 


) U0f 


) U1 ( 


) U2( 


> U3( 


) U4f 


) U3< ) 


U6( ) 


U7( 


> U8( 


) U9< ) 


Uff > 


U( 


) ue< 


) UK 


) H2( 


) W3< 


) H4< 


) W3< ) 


U6( ) 


H7( 


) W8( 


) H9( ) 


Uff ) 


X( 


) X0C 


) XK 


) X2< 


> X3< 


> X4f 


) X3< ) 


X6< ) 


X7( 


) X8( 


) X9( ) 


Xf f ) 


Y< 


> Y0f 


) YK 


) Y2f 


) Y3< 


> Y4< 


) Y5< ) 


Y6< ) 


Y7< 


> Y8< 


) Y9< ) 


Yf ( > 


Z< 


) zee 


> ZK 


> Z2( 


) Z3( 


> Z4( 


) Z5C ) 


Z6< ) 


Z7< 


> Z0< 


) Z9< ) 


Zf C ) 



RUN 

TH£Y ARE EQUAL 



LIS 

100 SET HOCASE 

110 IF • CABO •••f ABO* THEN 300 
120 'I'HEY ARE NOT EQUAL* 

300 PRINT 'THEY ARE EQUAL* 

T^Y ARE hot EQUAL 



LIS 

100 SET CASE 

110 IF *{AeC>*-*<A8C)* THEN 390 
120 PRINT 'THEY ARE NOT EQUAL* 
200 ENO 

380 PRINT 'THEY ARE EQUAL* 



RUN 

THEY ARE EQUAL 



Consequently, comparing strings which include 
parentheses, brackets and braces, may produce unan- 
ticipated results. 

How'ever, in numeric operations, the 4051 converts 
brackets or braces to parentheses (or drops them if 
unnecessary). Therefore, invalid results due to these 
characters won't occur in numeric comparisons. 

For example. 

100 A-l/2M2*3>-<C4-23/3>'t‘<24/3) 
lie pRi A 



100 INIT 

liS ^ PROGRAM TO HELP YOU KEEP TRACK OF THE UARIABLES IN 

120 REM ANY PROGRAM. AS YOU USE A NUMERIC UARIABLE OR ALPHA STRING 
130 REM FILL IN THE PARENTHESIS AND CIRCLE UHAT YOU HAUE USED («.». 
140 REM A2<23) OR A2<2,3) TO DIMENSION NUMERIC UARIABLES), OR («.*. 
130 REM A*<49) TO DIMENSION AH ALPHA STRING UARIABLE.) 

160 REM ALSO THEY CAN BE USED TO DEFINE UARIABLES NOT DIMENSIONED. 

170 REM <«.». LET A-A■^l), <€.§. LET A$-*THE*> 

180 PAGE 

190 LET L»«*ABCDEFGHI JKLHNOPQRSTUUUXYZ* 

200 LET N9-*C0123436789* 

210 PRINT * PROGRAMMING AID ' 

220 PRINT *JJ* 

230 PRINT * PROGRAM NAME PROGRAMMER 

240 PRINT -DATE / / * 

250 PRINT *J* 

260 PRINT * NUMERIC 

270 PRINT * ALPHA* 

280 PRINT 

290 FOR I-l TO LEHCLf) 

300 LET A$»SEG<Lt, 1,1) 

310 FOR J-1 TO LEH(Hf) 

320 PRINT Afl 

330 LET B$-SEC<N*, J, 1) 

340 PRINT B$J *< ) *1 
350 NEXT J 

360 PRINT - *|A$r*< >* 

370 NEXT I 
380 END 



Whatever means you use to track your variables, include 
it in your documentation. Your program user will be 
forever grateful. 



Note: There are also two programs in the 4051 Applications Library to 
Jo variable cross-referencing for existing programs: 51100-800210 and 
51100-800310. 1 



LIS 

100 A-l/2+<243)-(4-2)/3*24/'3 
110 PRINT A 
120 END 



INIT Rather Than CLOSE 

by Jay Beck 

When your 4907 file is open for read/ write operations 
(OPEN 'TESTFILE";1,''F'',A$), a pointer in the 4907 
firmware indicates where the next item to be read/ written 
is to occur. When a program fails after reading part way 
through a file, the user should type INIT. This resets the 
pointer to the beginning of the file and closes it, keeping 
the original file intact. If a CLOSE is typed instead, the 
4907 will write an end-of-file mark at the current pointer 





location and close the file. Everything between the pointer 
and the end of the original file is lost. This problem does 
not occur if the file is opened in read-only or update access 
modes, 



PEN 290, 10 



200 GOTO 210 
210 PEM Fu nc 1 1 on 
i 




■-V 






(original target line number 1 10 
vanishes to be replaced with wrong 
line number leading to wrong 
target) 

If the initial renumber had begun with a line number 
higher than the non-existent target line, the original target 
line number would have remained: 

(line 1 10 is non-existent) 




231 REM Fane ti on A 



Renumbering Doesn’t Update 
Everything 

When a RENUMBER statement is executed, the target 
lines of any CALL statement are /loi updated. 



For example: 

2509 CALL '*8APPEN-,3500 

2510 CALL -LINK", 4500 
3500 REM 

4500 REM 



(3500 is target line for BAPPEN) 
(4500 is target line for LINK) 



PEMUriBEP 

LIS 



100 CALL "BAPPEN", 3500 
lie CALL "LINK", 4500 
120 PEM 
130 REM 



(120 is new target line for BAPPEN) 
(130 is new target line for LINK) 



Note that both target lines in renumbered statements 100 
and 1 10 still retain the original line numbers. 



REN 200. 10 



200 GOTO 110 ^ 

210 REM Func t ion A 



(still non-existent but number intact) 



Or. retain correct target by inserting line 110 as a 
REMARK statement to hold it prior to renumbering: 



(line 1 10 is non-existent) 



147 GOTO 110 
231 PEM Function m 
n0 REM Hold Target Lint 



REN 100, 10 



100 REM Hold Target Lint 

110 GOTO 100 

120 REM Function A 







(different number but correct target) 



\ote: BAS/C EDITOR and Formatted Listings of the PRINTER 
PROGRA MS, both contained in PLOT 50 General Utility Programs, 
will tell you if you have any non-existent line references. 



Renumbering Might Update Wrong 
Line 

If you have code that references non-existent lines, before 
renumbering either insert those lines or renumber with 
higher values. This program illustrates results of not 
paying attention to this detail. 



(line 110 is non-existent) 



147 GOTO U0 
231 REM Function A 



REH 180.10 

100 GOTO 110 

110 REM Function A 

(still refers to original target line 
1 10 but now it’s the wrong target) 




Variable Symbois Are Not Deieted 

Once a simple variable symbol has been entered into 
memory, it alw'ays takes up at least 13 bytes of space (5 in 
the table listing and 8 for the number). A DELETE of a 
variable will eliminate the value assigned to that symbol, 
but the symbol will remain in the table and the space will 
be reserved for the number. To save memory, re-use these 
symbols for new values when the old are no longer 
needed, rather than assigning new symbols. 



For example: 



300 FOR I«1 TO 8 
310 GOSUB 700 
320 NEXT I 
330 FOR J»1 TO 5 
340 GOSUB 900 
350 NEXT J 




Then, after more coding, you follow with another 
renumber: 



8 



Rather than using the new variable J, the variable I could 
have been reassigned. As it stands in the example, 1 and J 



are both in the symbol table, with only one being used. 
Refer to page 4-8 in the 4051 Graphic System Reference 
Manual for more detail. 



Two-Character Variables Desirable 

Using two-character variable names might save time if 
you plan to edit your program using the Editor ROM or 
an editor program.* Whereas, searching for a single 
character variable will result in unwanted text being 
picked out, searching for an alpha character coupled with 
a numeric will usually locate the desired variable. 



*5 1 00-8007 iO. Text Editor, in the 4051 Applications Library, or 
4050 AOS BASIC EDITOR contained in PLOT 50 General Utilitv 
Programs, are two such programs available. 



4051 Applications Library 
Program Abstracts 

Order 

Documentation and program listings of each program are 
available for a nominal charge. Programs will be put on tape for a 
small recording: fee per program plus the charge for the tape 
cartrids:e. One tape will hold several programs. (The program 
material contained herein is supplied without warranty or 
representation of anv kind. Tektronix. Inc. assumes no respon- 
sibility and shall have no liability, consequential or otherwise, of 
any kind arisingfrom the use of this program material or any part 
thereof ) 

Domestic U.S. Prices: 

Documentation and listings $15 per program 

Recording Fee 2 per program 

Tape Cartridge 26 per tape 

Contribute 

Contribute one program to the Library and receive three in 
e.xchange. Send in the membership card from your 405 1 Graphic 
System Reference Manual to get the details. Or call us at (503) 
682-3411. e.xt. 2618. 

Forms 

Please use the Applications Library Order Form. Order forms 
are included in the Membership Packet and are available from 
your local Tektronix Sales Engineer. 

Outside U.S. 

Program contributions or orders outside the U.S. must be 
processed through the local Tektronix sales office or sent to one 
of the Libraries serving your area. See Library Addresses section. 



ABSTRACT NUMBER: 51/00-5202/0 

Title: NMR Calculation for a Three Spin System 

Authors: Tom Price and Dr. Jack Reid 
Lorillard Div. of Loews 
Greensboro, NC 
Memory Requirement: I6K 
Peripherals: Optional — 4631 
Optional — 4641 
Statements: 267 

This program calculates the spin-spin transition frequen- 
cies and relative intensities for a three spin Nuclear 
Magnetic Resonance (NMR) system. The energies of the 
eight possible energy states are calculated using the 
chemical shifts, in Hz, and coupling constants in Hz, 
entered from the keyboard. In the three spin system there 
are four possible energy levels. The first and fourth each 
contain one spin state; how'ever, the second and third each 
contain three spin states. The energies of these states are 
used as the diagonals of two 3x3 matrices. The off 
diagonal elements are calculated from the respective 
coupling constants. The two matrices are diagonalized, 
by the method of Jacobi CD© and the intensities 
calculated by identical diagonalization operations on an 
identity matrix. The final transition frequencies are 
calculated by the difference in the energies between 
adjacent energy levels. 

The output is displayed as either a listing and an NMR 
line spectrum on the graphic terminal or a listing on the 
printer. 



ABSTRACT NUMBER: 51/00-8018/0 

Title: Text FORMATting 
Author: Bruce Clarkson 

Science Applications, Inc. 

Raleigh, NC 

Memory Requirement: 16K (8K w/o comments) 
Peripherals: Option 1 Data Communications Interface 

or 

Option 10 RS-232 Printer Interface 
4051R06 Editor ROM 
Hard Copy Terminal 
Statements: 21 1 

FORMAT provides formatted text output similar to the 
University of Waterloo's SCRIPT program for 
System/ 360. Commands imbedded in the te.xt file 
(typically created with the TEKTRONIX Editor ROM) 
together with execution time parameters gives complete 
control over the format of the printed document. Options 
include right margin justification (padding with blanks), 
page size control, page numbering, indention, spacing, 
centering, etc. Any standard ASCII RS-232 compatible 
output device may be used (example: DEC-WRITER 
terminal). 
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ABSTRACT NUMBER: 51/07-8019/0 

Title; 4907 File Manager Based Mailing List 
Author: Brian Diehm 
Tektronix, Inc. 

Memory Requirement: 16K 
Peripherals: 4907 File Manager 

Optional— 4641 Printer (Recommended) 
Statements: 927 

This program uses the 4907 FILE MANAGER to 
maintain and print mailing lists for up to 50 different 
publications. Subscribers to all the lists are drawn from a 
single master subscriber file. Provision is included to add, 
delete, edit and list subscribers or subscriber groups by a 
last name key. Up to four lines of address information 
may be used. 



An average material waste ratio ^ 

An average lost order rate 

Desired inventory risk factor ( 

Initial Settings 

Initial inventory 
Initial order backlog 
Initial production 
Initial shipments 

Order Entry 

The number of iterations 
The initial order level 



Either: 

The growth rate 
or 

The iteration number for a step change 
The amount of the change 



Output files may be created for any of the publications, 
and this file is in zip code order. This file may be used by 
the program to drive the 4641 Printer to print a mailing 
list of stick-on labels. 

Two versions of the program are included. Only the 
minimum configuration version can be used on 16K 
machines. This version may also be best suited to very 
large output files, as the only limitation to their size is 
available disc space. The second version runs faster when 
creating output files by keeping a copy of the file’s link 
pointers in memory. This nets a 40% reduction of time 
required to create output files. However, the length of 
output file that may be created is limited by the memory 
available to store the links. For a 32K 4051, up to 1000 
entries may be filed; for a 24K machine, up to 500 entries 
may be filed. 

In both versions, the size of the subscriber file is limited 
only by the available disc space. 



A series of equations are then used to model the various 
relationships while the order quantities are derived from a 
random number generator. The Work Force and 
Materials' Inventory required for production at each 
iteration may be output. £ ^ 

ABSTRACT NUMBER: 51/00-5403/0 



Title: Sound Spectrum PRESENTATION 
Author: Norman D. Taylor 
Memory Requirement: 16K 
Peripherals: 4631 Hard Copy Unit 
Rockland FFT 512/ S 
Statements: 126 



ABSTRACT NUMBER: 51/00-0501/0 

Title: Inventory/Production Modeling I 
Author: Dennis R. Heckman 
Tektronix, Inc. 

Memory Requirement: 16K 
Peripherals: Optional — 4662 Plotter 
Optionai^ — 4641 Printer 
Statements: 333 

This program is designed to naively represent a Manufac- 
turing Operation producing one product. As inputs the 
program requires: 

Ratios and Constants 

An average production rate per worker 
Total facility capacity 
Desired backlog time 



This program reads the values for a one-third octave 
sound spectrum from a Rockland Analyzer, calculates 
Overall Sound Pressure Level (OASPL), plots this data 
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The program interrogates the Analyzer to determine the 
frequency range that has been analyzed and the gain 
settings, both coarse and fine. Then the coordinate axes 
are drawn accordingly. The Y-axis is plotted in decibels 
(dB) and the X-axis is frequency in Hertz (Hz). Next, the 
spectrum is read in from the analyzer. As it is read and 
plotted, the OASPL is calculated. Finally, a hard copy of 
the finished plot is generated. 

An option is included to allow a series of OASPLs to be 
calculated (for instance, a line of microphones) and a 
listing displayed. 



ABSTRACT NUMBER: 51/00-9508/1 

Title: Dashed Lines 
Author: Bob Ross 
Memory Requirement: 8K 
Peripherals: Any Plotting Device 
Statements: 1 54 

This is a consolidation of programs 5 1 00-9508 . 0, 

5 1 00-9509 0 and 51 00-9510^0. 

Three subroutines draw dashed lines for: 

1) a Y array with X values stepped linearly from a 
starting to an ending value: 

2) points stored in X and Y arrays; 

3) a sequence of X and Y values. 

The dashes are a constant length regardless of the 
viewport and window chosen. The dash length and ratio 
of dash to dash plus space are selectable. The line can start 
and end on a full dash or full space. 

ABSTRACT NUMBER: 51/07-9522/0 

Title: 4907 U.S. Map and Segmented Data Base Win- 
dowing Routine 

Author: Leslie L. Brabetz 
Tektronix, Inc. 

Memory Requirement: 32K, Level 5 Firmware 
Peripherals: 4907 FILE MANAGER 
4952 Joystick 

Statements: 956 plus 99 binary data files* 

Two programs illustrate and employ the unique 
capabilities of the Tektronix 4907 FILE MANAGER. 

U.S. Map 

The U.S. Map program demonstrates accessing and 
displaying a segmented data base existing on the 4907 
FILE MANAGER, as opposed to reading and clipping 
an entire serial data base in order to view a smaller 



portion. The master data base is read and a highly 
detailed map of the continental United States, with grid, 
is displayed on the 4051 graphic screen. 

The user is then requested to select a lower left corner and 
upper right corner using the 4952 Joystick. Only those 
segment files containing the selected portions of the map 
are read, permitting rapid display. 

The routines included in the U.S. Map program are: disc 
formatting, transfer from tape to disc of the 96 segment 
data files, master data base, and routine to display the 
map and its segments. 

Windowing Routine 

This program creates a segmented data base from a 
master data base (the U.S. Map in this case) to 
demonstrate the 4907 FILE MANAGER capabilities. It 
performs random access of files from the disc. A series of 
articles in TEKniques (Vol. 1 No. 10, and Vol. 2 Nos. 1 
and 2) describe the theory and operation of the 
demonstration. 

The program allows definition of a rectangular data 
window. A master file may be read in, and the vectors 
which begin and end or intersect the data window are 
stored in a segment file. The coordinates of intersection 
with the boundaries are calculated and stored in the 
segment file. On a graphics display, this operation is 
called "windowing"; hence, this program windows on 
data bases. The master data file must be in the form of 
arrays, with the number of coordinate pairs N, then the 
coordinate arrays X, Y. 

N, Xi, X. X., Yi, Yz Yn 

Output segment files are created with the same format. 



*T\vo carind^e tapes required. 

ABSTRACT NUMBER: 51/00-9523/0 

Title: Data Graphing 
Author: Chuck Eng 

Tektronix, Inc. 

Memory Requirement: 32K 
Peripherals: Optional — 4631 Hard Copy Unit 
Optional — 4662 Plotter 
Optional — 4051R05 Binary ROM 
Statements: 926 

Create graphs quickly and easily with Data Graphing. 
Computer expertise is not required since the user is 
prompted for the minimal inputs. Up to six curves may be 
created from: 

Keyboard data input 

The sum of all previous curves 




The average of all previous curves 
The cumulative sum of the previous curve 
The least squares fit of the previous curve 
Data on a data file 

X-axis values may be user-input or auto-sequence. Graph 
de_sign allows selection of: 

The type of curve (bar, solid, phantom, dash) with 
variations of each 

Grid 

Labels 

Hidden line removal 
Scaling of Y-axis 

Saving data for curves and or graph. 

Other functions allow changes in curve data or graph 
parameters, listing of data, drawing to the 405 1 screen or 
4662 Plotter and examples. 

The program includes the menu file. Binary and ASCII 
programs and four sample data files. Additional data files 
must be pre-MARked for storage of curve and graph 
data. 



4051 Applications Libraries 

Africa, Europe, Middle East 

4051 Applications Library 
Tektronix Datatek N.V. 

P.O.Box 159 

Badhoevedorp, The Netherlands 

Australia 

4051 Applications Library 
Tektronix Australia Pty. Limited 
Sydney 

80 Waterloo Road 
North Ryde, N.S.W. 2113 

Canada 

4051 Applications Library 
Tektronix Canada Ltd. 

P.O. Box 6500 
Barrie, Ontario 
Canada L4M 4V3 

Caribbean, Latin America 
and Far East (excl. Japan) 

Ms. Bev Brandon, 73-31 2 
Export Marketing 
Tektronix, Inc. 

P.O. Box 500 

Beaverton, Oregon 97077 
U.S.A. 

Japan 

4051 Applications Library 
Sony. Tektronix Corporation 
9-31 Kitashmagawa-5 
Tokyo 1 4 1 Japan 

United States 

4051 Applications Library 
Tektronix. Inc. 

Group 451 
P.O. Box 500 

Beaverton, Oregon 97077 



TEKniques. the 4051 Applications Library Newsletter, is 
published by the Information Display Group of Tektronix, 
Inc., Group 451, P.O. Box 500, Beaverton. Oregon 97077. It 
is distributed to TEKTRONIX 4051 users and members of 
the 4051 Applications Library. 

Publisher ...... 

Managing Editor . 

Editor 

Graphic Designer 
Circulation 



. . Ken Cramer 
Patricia Kelley 
Terence Davis 
. Mark Woods 
Rory Gugliotta 



( 



( 



12 





